home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PsL Monthly 1993 December
/
PSL Monthly Shareware CD-ROM (December 1993).iso
/
prgmming
/
dos
/
basic
/
pbtool.exe
/
BREAK.INC
< prev
next >
Wrap
Text File
|
1991-10-28
|
965b
|
28 lines
'----------------------------------------------------------
' PROGRAM: BREAK.INC PROGRAMMER: A. KELLETT
' DATE-WRITTEN: 10/28/91
' USING POWER BASIC V2.10A
'
' THIS PROGRAM ALLOWS BREAKING OUT OF MOST PROGRAMS,
' EXCEPTIONS ARE THOSE WITH NO SCREEN I/O.
'
' VERSION: 0.00 LAST UPDATED: 00/00/00
'----------------------------------------------------------
' NOTES: Both $EVENT OFF and KEY(10) OFF will disable this routine.
' Use this at the beginning of your program, works even if the
' computer is not performing keyboard i/o or printing. Saves
' rebooting to get out!!
'
'
'----- Break.Inc --------------
ON KEY(10) GOSUB ENDPROGRAM :REM*** CHANGE TO KEY(1) FOR F1, ETC. ***
KEY(10) ON
GOTO NEXTLABEL
ENDPROGRAM
END
NEXTLABEL:
'
' YOUR MAIN CODE SHOULD FOLLOW HERE. YOU CAN INSERT THE ABOVE FEW LINES
' INTO YOUR CODE AND DISPLAY A MESSAGE, IE "PRESS F10 TO EXIT AT ANY TIME"
'